 ===============================================================================
   (http://publ.lib.ru)
 ===============================================================================
  77  
  
 :    , 1989

  32.973-01
  681.3.06
 80

 : .. , .. , .. , .. , .. 
 : . -  .. 

  77   / .. , .. , ..   . - .:   , 1989. - 351 .: .
 ISBN 5-279-00240-2.
     -       77                7 (  ).     -   .             .
  ,    77  ,   .

  32.973-01

 :
  (3).
  I.    77 (5).
  1.     77    (5).
 1.1.   77 (5).
 1.2.   (6).
 1.3.   (7).
 1.4.     (9).
 1.5.    (10).
 1.6.     77 (12).
  2.    (14).
 2.1.   (14).
 2.2.  (16).
 2.3.  (19).
 2.4.  (19).
 2.5.  (21).
 2.6.  (22).
 2.6.1.   (22).
 2.6.2.   (24).
 2.6.3.   (24).
 2.6.4.   (25).
 2.6.5.   (26).
 2.6.6.   (27).
  3.  (27).
 3.1.   (27).
 3.1.1.    (27).
 3.1.2.    (28).
 3.1.3.    (28).
 3.1.4.  ASSIGN (29).
 3.2.   (30).
 3.2.1.   GO  (30).
 3.2.2.   IF (32).
 3.2.3.   (34).
 3.2.4.  DO (40).
 3.2.5.  CONTINUE (47).
 3.2.6.  PAUSE  STOP (48).
 3.2.7.  END (48).
 3.2.8.     (48).
 3.3.   (50).
 3.3.1.  IMPLICIT (50).
 3.3.2.  PARAMETER (51).
 3.3.3.  DIMENSION (53).
 3.3.4.    (53).
 3.3.5.  COMMON (54).
 3.3.6.  EQUIVALENCE (57).
 3.4.  DATA (60).
 3.5.  PROGRAM (62).
 3.6.  (62).
 3.6.1.   (62).
 3.6.2.   (64).
 3.6.3.    (65).
 3.6.4.    SUBROUTINE.  CALL (66).
 3.6.5.   (66).
 3.6.6.  FUNCTION (85).
 3.6.7.  SUBROUTINE (86).
 3.6.8.  RETURN (87).
 3.6.9.  ENTRY (88).
 3.6.10.        (90).
 3.6.11.     (97).
 3.6.12. - (105).
 3.6.13.  BLOCK DATA (106).
 3.7.  SAVE (106).
 3.8.  INCLUDE  EJECT (107).
  II.      (108).
  4. - (108).
 4.1. ,     (108).
 4.2.     (110).
 4.3.        (111).
 4.3.1.        (111).
 4.3.2.     (113).
 4.3.3.  VSAM (114).
 4.4.    - (127).
 4.4.1.   (127).
 4.4.2.    (132).
 4.4.3.    (134).
 4.5.   (135).
 4.5.1.   (135).
 4.5.2.  OPEN    (135).
 4.5.3. -   (136).
 4.5.4. -   (140).
 4.5.5.    BACKSPACE, REWIND  END FILE (146).
 4.6.   (147).
 4.6.1.   (147).
 4.6.2.  OPEN    (148).
 4.6.3.    (148).
 4.6.4.     (149).
 4.7.   (152).
 4.7.1.   (152).
 4.7.2.  OPEN    (154).
 4.7.3.  .  WRITE (155).
 4.7.4.   (157).
 4.7.5.        (163).
 4.7.6.  .  READ (164).
 4.7.7.  .  REWRITE (169).
 4.7.8.  .  DELETE (170).
 4.7.9.  BACKSPACE (171).
 4.7.10.  REWIND (172).
 4.7.11.  INQUIRE (174).
 4.8.   (174).
 4.8.1.     (174).
 4.8.2.   I (178).
 4.8.3.   F, E, D  Q (179).
 4.8.4.   L (181).
 4.8.5.   G (181).
 4.8.6.    (183).
 4.8.7.    (184).
 4.8.8.   Z (185).
 4.8.9.    - (185).
 4.8.10.   , TL, TR  X (186).
 4.8.11.   S, SP  SS (187).
 4.8.12.   BN  BZ (187).
 4.8.13.  /  : (188).
 4.8.14.      - (189).
 4.8.15.    .  FORMAT (192).
 4.9.    (193).
  5.     77 (195).
 5.1.   (195).
 5.1.1.    (195).
 5.1.2.     (197).
 5.2.      (199).
 5.2.1.  (200).
 5.2.2.    (201).
 5.2.3.      (203).
 5.3.      (206).
 5.3.1.     (207).
 5.3.2.  (207).
 5.3.3.    (209).
 5.3.4.      (211).
 5.4.  (213).
 5.4.1.   1 (214).
 5.4.2.   2 (215).
 5.4.3.   3 (220).
 5.4.4.    (221).
 5.4.5.   . (222).
 5.5.    (223).
 5.5.1.    (223).
 5.5.2.     (225).
 5.5.3.  (226).
 5.5.4.    (226).
 5.5.5.  (229).
 5.5.6.     (231).
 5.5.7.  (232).
 5.5.8.   (234).
 5.6.   INCLUDE (236).
 5.7.    (239).
 5.8.    (240).
 5.8.1.   (240).
 5.8.2.   AUTODBL (243).
 5.8.3.    (247).
 5.9.     77 (249).
  III.     77 (257).
  6.     (257).
 6.1.   (257).
 6.2.   (257).
 6.3.   (259).
 6.4.    (261).
 6.5.    (265).
 6.5.1.      (266).
 6.5.2.  ,   (271).
 6.5.3.   (275).
 6.5.4.   ,     77 (278).
 6.6.   (279).
  7.      (282).
 7.1.   (282).
 7.2.  DEBUG (283).
 7.3.  AT (285).
 7.4.  TRACE ON  TRACE OFF (285).
 7.5.  DISPLAY (286).
 7.6.  END DEBUG (287).
 7.7.     (287).
 7.8.      (291).
 7.9.   .  TESTF 77 (292).
 7.10.    (294).
 7.11.    (300).
 7.11.1.    (300).
 7.11.2.    (301).
 7.11.3.    (309).
 7.11.4.    (311).
 7.11.5.     (313).
 7.11.6.      (317).
 7.11.7.    (322).
 7.11.8.   (326).
  (332).
  1.    77    66 (332).
  2.   (335).
  3.       77 (336).
  (347).

  
   ,   ,     .
  77  
   .. 
  .. 
   .. , .. 
   .. 
   .. , .. 
  .. , .. 
   .. 
    16.01.89.    06.09.89.  50000 .  1 . 30 .
    , .
 ===============================================================================
 ***         *        *** 5.4 ***
 ===============================================================================
 | -ۦ   
 |, ,  
 |... Ŧ  ...._  77  .
 | 
 |---Ϧ  .
 s:   ,   ,   , .. , .. .
   .. .
 |. -   :    , 1989
 |   OCR , OCR, ,  Djv: AlVaKo, 2026
 |  Ȧ Brich_Zinaida_Sergeevna
 |  Ȧ
 |   Brich_Z.S...__Fortran_77_ES_EVM.(1989)
 |  Ȧ [djv] [pdf]
 |  .  Fo7789
 |    :
     -       77                7 (  ).     -   .             .
  ,    77  ,   .
 | ߦ :
  (3).
  I.    77 (5).
  1.     77    (5).
 1.1.   77 (5).
 1.2.   (6).
 1.3.   (7).
 1.4.     (9).
 1.5.    (10).
 1.6.     77 (12).
  2.    (14).
 2.1.   (14).
 2.2.  (16).
 2.3.  (19).
 2.4.  (19).
 2.5.  (21).
 2.6.  (22).
 2.6.1.   (22).
 2.6.2.   (24).
 2.6.3.   (24).
 2.6.4.   (25).
 2.6.5.   (26).
 2.6.6.   (27).
  3.  (27).
 3.1.   (27).
 3.1.1.    (27).
 3.1.2.    (28).
 3.1.3.    (28).
 3.1.4.  ASSIGN (29).
 3.2.   (30).
 3.2.1.   GO  (30).
 3.2.2.   IF (32).
 3.2.3.   (34).
 3.2.4.  DO (40).
 3.2.5.  CONTINUE (47).
 3.2.6.  PAUSE  STOP (48).
 3.2.7.  END (48).
 3.2.8.     (48).
 3.3.   (50).
 3.3.1.  IMPLICIT (50).
 3.3.2.  PARAMETER (51).
 3.3.3.  DIMENSION (53).
 3.3.4.    (53).
 3.3.5.  COMMON (54).
 3.3.6.  EQUIVALENCE (57).
 3.4.  DATA (60).
 3.5.  PROGRAM (62).
 3.6.  (62).
 3.6.1.   (62).
 3.6.2.   (64).
 3.6.3.    (65).
 3.6.4.    SUBROUTINE.  CALL (66).
 3.6.5.   (66).
 3.6.6.  FUNCTION (85).
 3.6.7.  SUBROUTINE (86).
 3.6.8.  RETURN (87).
 3.6.9.  ENTRY (88).
 3.6.10.        (90).
 3.6.11.     (97).
 3.6.12. - (105).
 3.6.13.  BLOCK DATA (106).
 3.7.  SAVE (106).
 3.8.  INCLUDE  EJECT (107).
  II.      (108).
  4. - (108).
 4.1. ,     (108).
 4.2.     (110).
 4.3.        (111).
 4.3.1.        (111).
 4.3.2.     (113).
 4.3.3.  VSAM (114).
 4.4.    - (127).
 4.4.1.   (127).
 4.4.2.    (132).
 4.4.3.    (134).
 4.5.   (135).
 4.5.1.   (135).
 4.5.2.  OPEN    (135).
 4.5.3. -   (136).
 4.5.4. -   (140).
 4.5.5.    BACKSPACE, REWIND  END FILE (146).
 4.6.   (147).
 4.6.1.   (147).
 4.6.2.  OPEN    (148).
 4.6.3.    (148).
 4.6.4.     (149).
 4.7.   (152).
 4.7.1.   (152).
 4.7.2.  OPEN    (154).
 4.7.3.  .  WRITE (155).
 4.7.4.   (157).
 4.7.5.        (163).
 4.7.6.  .  READ (164).
 4.7.7.  .  REWRITE (169).
 4.7.8.  .  DELETE (170).
 4.7.9.  BACKSPACE (171).
 4.7.10.  REWIND (172).
 4.7.11.  INQUIRE (174).
 4.8.   (174).
 4.8.1.     (174).
 4.8.2.   I (178).
 4.8.3.   F, E, D  Q (179).
 4.8.4.   L (181).
 4.8.5.   G (181).
 4.8.6.    (183).
 4.8.7.    (184).
 4.8.8.   Z (185).
 4.8.9.    - (185).
 4.8.10.   , TL, TR  X (186).
 4.8.11.   S, SP  SS (187).
 4.8.12.   BN  BZ (187).
 4.8.13.  /  : (188).
 4.8.14.      - (189).
 4.8.15.    .  FORMAT (192).
 4.9.    (193).
  5.     77 (195).
 5.1.   (195).
 5.1.1.    (195).
 5.1.2.     (197).
 5.2.      (199).
 5.2.1.  (200).
 5.2.2.    (201).
 5.2.3.      (203).
 5.3.      (206).
 5.3.1.     (207).
 5.3.2.  (207).
 5.3.3.    (209).
 5.3.4.      (211).
 5.4.  (213).
 5.4.1.   1 (214).
 5.4.2.   2 (215).
 5.4.3.   3 (220).
 5.4.4.    (221).
 5.4.5.   . (222).
 5.5.    (223).
 5.5.1.    (223).
 5.5.2.     (225).
 5.5.3.  (226).
 5.5.4.    (226).
 5.5.5.  (229).
 5.5.6.     (231).
 5.5.7.  (232).
 5.5.8.   (234).
 5.6.   INCLUDE (236).
 5.7.    (239).
 5.8.    (240).
 5.8.1.   (240).
 5.8.2.   AUTODBL (243).
 5.8.3.    (247).
 5.9.     77 (249).
  III.     77 (257).
  6.     (257).
 6.1.   (257).
 6.2.   (257).
 6.3.   (259).
 6.4.    (261).
 6.5.    (265).
 6.5.1.      (266).
 6.5.2.  ,   (271).
 6.5.3.   (275).
 6.5.4.   ,     77 (278).
 6.6.   (279).
  7.      (282).
 7.1.   (282).
 7.2.  DEBUG (283).
 7.3.  AT (285).
 7.4.  TRACE ON  TRACE OFF (285).
 7.5.  DISPLAY (286).
 7.6.  END DEBUG (287).
 7.7.     (287).
 7.8.      (291).
 7.9.   .  TESTF 77 (292).
 7.10.    (294).
 7.11.    (300).
 7.11.1.    (300).
 7.11.2.    (301).
 7.11.3.    (309).
 7.11.4.    (311).
 7.11.5.     (313).
 7.11.6.      (317).
 7.11.7.    (322).
 7.11.8.   (326).
  (332).
  1.    77    66 (332).
  2.   (335).
  3.       77 (336).
  (347).
 ===============================================================================